home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 November
/
EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso
/
earcd
/
util
/
text
/
edt10.lha
/
S
/
M2Edt
/
Umlaute.edt
< prev
next >
Wrap
Text File
|
1994-08-19
|
524b
|
25 lines
/* Umlaute konvertieren */
OPTIONS RESULTS
u=GetClip("Umlaute?")
IF ~u THEN DO
'SetKey "ä" `Insert "ä"`'
'SetKey "Ä" `Insert "Ä"`'
'SetKey "ü" `Insert "ü"`'
'SetKey "Ü" `Insert "Ü"`'
'SetKey "ö" `Insert "ö"`'
'SetKey "Ö" `Insert "Ö"`'
'SetKey "ß" `Insert "ß"`'
END
ELSE DO
'SetKey "ä" `Insert "ae"`'
'SetKey "Ä" `Insert "Ae"`'
'SetKey "ü" `Insert "ue"`'
'SetKey "Ü" `Insert "Ue"`'
'SetKey "ö" `Insert "oe"`'
'SetKey "Ö" `Insert "Oe"`'
'SetKey "ß" `Insert "ss"`'
END
SetClip("Umlaute?", ~u)